Fix customize type for replacement-alist

Ref #165

diff --git a/which-key.el b/which-key.el
index cc3cc0dc81c10514d3d7ba931319c21a2b392af6..825e1cb0377b31c22cb99e377aea2d46b0e1bcdc 100644 (file)
--- a/which-key.el
+++ b/which-key.el
@@ -183,8 +183,10 @@ Finally, you can multiple replacements to occur for a given key
 binding by setting `which-key-allow-multiple-replacements' to a
 non-nil value."
   :group 'which-key
-  :type '(alist :key-type (alist :key-type regexp :value-type regexp)
-                :value-type (alist :key-type regexp :value-type regexp)))
+  :type '(alist :key-type (cons (choice regexp nil)
+                                (choice regexp nil))
+                :value-type (cons (choice string nil)
+                                  (choice string nil))))
 
 (when (bound-and-true-p which-key-key-replacement-alist)
   (mapc